#lang racket
;image stub :D
(provide image%)
(define image%
  (class object%
    (init-field (is-animated #t))
    
    (define/public (get-is-animated)
      is-animated)
    (super-new)))

(printf "images.rkt chargé")